home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 25 / Cream of the Crop 25.iso / bbs / mhis020.zip / CALLINDI.MEX < prev    next >
Text File  |  1996-09-16  |  438b  |  18 lines
  1. #include <max.mh>
  2. #include "callers.mh"
  3. #include "callutil.mh"
  4.  
  5. int main () {
  6.   string: result;
  7.   char: newCh;
  8.  
  9.   result := substr (input, 1, strlen (input) - 1);
  10.   input := "";
  11.   input_str (result, INPUT_NLB_LINE + INPUT_DEFAULT, 0, 80,
  12.     COL_LBLUE + "Enter call number, date, '=' for current, or <enter> for first: " + COL_CYAN);
  13.  
  14.   read_callers ();
  15.   callers.index := caller_index (result);
  16.   write_callers ();
  17.   }
  18.